home *** CD-ROM | disk | FTP | other *** search
/ The Macintosh Bible Guide to Games / GameGuideCd.bin / Cheaters / Marathon Stuff / Pfhorte_1.0d22ƒ / Scripts / #MakeControlPanel next >
Text File  |  1995-08-07  |  703b  |  25 lines

  1. * This script is Copyright 1995 by Steve Israelson
  2. * Segments a line and then adds a small alcove
  3. * to that line segment.  Then puts a control panel in it.
  4. *
  5. * Before calling this script, set A to the control panel type.
  6.  
  7. segmentLine 512
  8. * The pen is at the first point in the line pointing at the
  9. * second, so turn -90 degrees to point away from the line
  10. turn -90
  11. newLine 64
  12. turn 90
  13. * here we set the type of next wall to the specified control panel
  14. wallType A
  15. newLine 512
  16. * Here we use a shortcut to connect to the last line of the
  17. * original starting segment
  18. lastPoint
  19. makeLine
  20. * We are done plotting points, now actually make the poly
  21. floorHeight 400
  22. height 512
  23. polyType MonsterImpassable
  24. closePoly
  25.